home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / news / readers / nn / nn6.4.patch9 < prev    next >
Encoding:
Text File  |  1990-07-31  |  53.9 KB  |  2,056 lines
  1.          This is an official patch to nn release 6.4
  2.          -------------------------------------------
  3.  
  4.                    PATCH #9
  5.  
  6.                 Priority: MEDIUM
  7.  
  8.  
  9. These patches fix a trivial, but irritating bug introduced in patch
  10. #8, as well as a few other bugs which have been on the "to-be-fixed"
  11. list for some time.  Here are some of the fixes:
  12.  
  13. - Setting "record" in the init file would cause nn to dump core.
  14.  
  15. - By mistake I had used one of those "wonderful" tri-graphs defined by
  16.   ANSI-C in a string constant ("??/" was taken as "\" which obviously
  17.   isn't a complete string - sigh!)
  18.  
  19. - Using K in reading mode to auto-select on a subject no longer skips
  20.   to the next group immediately.  Also it no longer leaves the current
  21.   article selected on the next invocation unless marked so explicitly.
  22.  
  23. - If some articles are read and other are left unread in a group,
  24.   going back to the group with "P" would only show the remaining
  25.   unread articles on the menu - now the read articles which were
  26.   initially unread are included on the menu (marked read).
  27.   [there is a new previous-also-read variable to control this].
  28.  
  29. - There was a crude bug in the parsing of folders which could fool nn
  30.   if the last article in a folder was a patch (diff -c).
  31.  
  32. - There has been some problems with "nnmaster -k" not killing the
  33.   running master.  It now tries a little harder, but it still has to
  34.   be seen whether that is hard enough :-)
  35.  
  36.  
  37. New features:
  38.   
  39. - There are now so many variables that ":set all" has become a tedious
  40.   way to check a specific variable's value.  There is now a new form:
  41.       :set /regexp
  42.   which will list only the variables matching the given regular expression.
  43.  
  44. - When completing a variable name in the :set command, the current
  45.   value of the variable is shown in the message line.
  46.  
  47. - The built-in pager can now scroll article text if the variable
  48.   scroll-last-lines is set to -1.  It may also be set to a positive
  49.   number in which case, nn will only scroll if there are less than
  50.   that many lines left in the article.  Try setting it to 10 to see
  51.   its intended use (to scroll only the last page).
  52.  
  53. - There is a new "admins" file which can be created in the CLIENT
  54.   directory.  It should contain the login names of the users which are
  55.   allowed to use the more advanced features of nnacct, e.g. -ar.
  56.  
  57. - Variables can now be set on the command line using arguments of the
  58.   form variable=value.
  59.  
  60.  
  61. As usual, all changes are described in the updated RELEASE_NOTES file
  62. (read that for more details about this patch).  Thanks to all who
  63. reported bugs and provided fixes.
  64.  
  65. To apply this patch, use nn's :patch command, or run this command from
  66. the shell in the root of the nn source tree:
  67.     patch -p0 < this-article
  68.  
  69. Then run "make all" and "./inst u".
  70.  
  71. ++Kim Storm
  72.  
  73. *** ./LAST/account.c    Mon Jul 16 17:38:38 1990
  74. --- account.c    Wed Jul 18 10:20:57 1990
  75. ***************
  76. *** 349,354 ****
  77. --- 349,378 ----
  78.       fprintf(stderr, "ZERO of accounts failed -- check permissions etc.\n");
  79.   }
  80.   
  81. + static news_admin(caller)
  82. + char *caller;
  83. + {
  84. +     FILE *adm;
  85. +     char line[80];
  86. +     int len, ok;
  87. + 
  88. +     adm = open_file(relative(lib_directory, "admins"), OPEN_READ);
  89. +     if (adm == NULL) return 2;
  90. +     len = strlen(caller);
  91. +     ok = 0;
  92. + 
  93. +     while (fgets(line, 80, adm)) {
  94. +     if (line[len] != NL) continue;
  95. +     line[len] = NUL;
  96. +     if (strcmp(caller, line) == 0) {
  97. +         ok = 1;
  98. +         break;
  99. +     }
  100. +     }
  101. +     fclose(adm);
  102. +     return ok;
  103. + }
  104. + 
  105.   main(argc, argv)
  106.   int argc;
  107.   char *argv[];
  108. ***************
  109. *** 371,376 ****
  110. --- 395,403 ----
  111.       }
  112.   
  113.       if (user_id != 0) {
  114. +     caller = user_name();
  115. +     if (news_admin(caller) == 1) goto caller_ok;
  116. + 
  117.       if (report_all) {
  118.           fprintf(stderr, "Only root can request complete reports\n");
  119.           exit(9);
  120. ***************
  121. *** 391,403 ****
  122.           fprintf(stderr, "Only root can request reports for other users\n");
  123.           exit(9);
  124.       }
  125. - 
  126. -     if ((caller = getlogin()) == NULL)
  127. -         if ((caller = user_name()) == NULL)
  128. -         caller = "UNKNOWN";
  129.       } else
  130.       caller = "root";
  131.   
  132.       if ((new_policy >= 0 || new_quota >= 0) && users == 0) {
  133.       fprintf(stderr, "usage: %s -pPOLICY -qQUOTA user...\n", argv[0]);
  134.       exit(1);
  135. --- 418,427 ----
  136.           fprintf(stderr, "Only root can request reports for other users\n");
  137.           exit(9);
  138.       }
  139.       } else
  140.       caller = "root";
  141.   
  142. +  caller_ok:
  143.       if ((new_policy >= 0 || new_quota >= 0) && users == 0) {
  144.       fprintf(stderr, "usage: %s -pPOLICY -qQUOTA user...\n", argv[0]);
  145.       exit(1);
  146. *** ./LAST/answer.c    Mon Jul 16 17:38:39 1990
  147. --- answer.c    Tue Jul 17 20:26:23 1990
  148. ***************
  149. *** 249,255 ****
  150.       clrdisp();
  151.       pg_init(0, 1);
  152.       }
  153. !     pg_regexp = regcomp(expr);
  154.   
  155.       while (fgets(line, 512, f)) {
  156.       if (pg_regexp && regexec_fold(pg_regexp, line) == 0) continue;
  157. --- 249,255 ----
  158.       clrdisp();
  159.       pg_init(0, 1);
  160.       }
  161. !     if (expr) pg_regexp = regcomp(expr);
  162.   
  163.       while (fgets(line, 512, f)) {
  164.       if (pg_regexp && regexec_fold(pg_regexp, line) == 0) continue;
  165. ***************
  166. *** 846,852 ****
  167.   
  168.       prompt(who_am_i == I_AM_POST ? "Newsgroups: " : "\1POST to group\1 ");
  169.   
  170. !     strcpy(brk_chars, "??/");
  171.       brk_chars[0] = help_key;
  172.       str = get_s(current_group ? current_group->group_name : NONE,
  173.               group_name, brk_chars, group_completion);
  174. --- 846,852 ----
  175.   
  176.       prompt(who_am_i == I_AM_POST ? "Newsgroups: " : "\1POST to group\1 ");
  177.   
  178. !     strcpy(brk_chars, " /?");
  179.       brk_chars[0] = help_key;
  180.       str = get_s(current_group ? current_group->group_name : NONE,
  181.               group_name, brk_chars, group_completion);
  182. *** ./LAST/articles.c    Tue Jun 12 11:46:26 1990
  183. --- articles.c    Tue Jul 17 16:03:55 1990
  184. ***************
  185. *** 285,291 ****
  186.       leave_attr = A_LEAVE_NEXT;
  187.   
  188.       if (!(flags & ACC_SPEW_MODE))
  189. !     use_newsrc(gh, (flags & ACC_ORIG_NEWSRC) ? 1 : 0);
  190.   
  191.       if ((flags & ACC_EXTRA_ARTICLES) == 0)
  192.       mark_memory(&mem_marker);
  193. --- 285,292 ----
  194.       leave_attr = A_LEAVE_NEXT;
  195.   
  196.       if (!(flags & ACC_SPEW_MODE))
  197. !     use_newsrc(gh, (flags & ACC_MERGED_NEWSRC) ? 2 :
  198. !                (flags & ACC_ORIG_NEWSRC) ? 1 : 0);
  199.   
  200.       if ((flags & ACC_EXTRA_ARTICLES) == 0)
  201.       mark_memory(&mem_marker);
  202. ***************
  203. *** 371,376 ****
  204. --- 372,380 ----
  205.   
  206.       ah->attr = test_article(ah);
  207.   
  208. +     if (flags & ACC_MERGED_NEWSRC) {
  209. +         if (ah->attr == A_KILL) continue;
  210. +     } else
  211.       if (ah->attr != A_READ && (flags & ACC_ONLY_READ_ARTICLES))
  212.           continue;
  213.   
  214. ***************
  215. *** 412,417 ****
  216. --- 416,423 ----
  217.           break;
  218.   
  219.        case A_READ:
  220. +         if (flags & ACC_MERGED_NEWSRC) break;
  221. + 
  222.           if (!(flags & (ACC_ALSO_READ_ARTICLES | ACC_ONLY_READ_ARTICLES)))
  223.           if (ah->a_number > gh->last_article)
  224.               continue;
  225. *** ./LAST/articles.h    Tue Jun 12 11:46:26 1990
  226. --- articles.h    Tue Jul 17 15:09:37 1990
  227. ***************
  228. *** 53,55 ****
  229. --- 53,56 ----
  230.   #define ACC_ON_SUBJECT        FLAG(13) /* match on subject (also) */
  231.   #define ACC_DO_KILL        FLAG(14) /* do auto-kill/select */
  232.   #define    ACC_PARSE_VARIABLES    FLAG(15) /* kill, split, etc. */
  233. + #define ACC_MERGED_NEWSRC    FLAG(16) /* merge orig and cur .newsrc */
  234. *** ./LAST/digest.c    Thu Apr 26 16:35:07 1990
  235. --- digest.c    Wed Jul 18 13:17:01 1990
  236. ***************
  237. *** 165,170 ****
  238. --- 165,172 ----
  239.           if (line_type[backup_index] & (LN_ASTERISK | LN_END_OF)) break;
  240.           }
  241.   
  242. +     digest.dg_lpos = backup_p[backup_index];
  243. + 
  244.       if (digest.dg_lines == 0) return 0;
  245.   
  246.       while (--backup_count >= 0) {
  247. *** ./LAST/doc/RELEASE_NOTES    Mon Jul 16 17:38:41 1990
  248. --- doc/RELEASE_NOTES    Wed Jul 18 18:57:12 1990
  249. ***************
  250. *** 967,973 ****
  251. --- 967,1055 ----
  252.   From:    Tony Wilson <wilson@issun3.stc.nl>
  253.   Fixed:    Patch #8 [menu.c  -- buffer overrun in get_purpose]
  254.   
  255. + Prog:    nn
  256. + Title:    Cannot set "record" variable (dumps core).  (bug in patch 8)
  257. + From:    beldar@mips.com (Gardner Cohen) + fix
  258. +     Damian Chu <dac@doc.ic.ac.uk> + fix
  259. +     Tony Wilson <wilson%shapetc@nluug.nl>
  260. +     rock@warp.Eng.Sun.COM (Bill Petro)
  261. + Fixed:    Patch #9 [variable.c]
  262. + 
  263. + Prog:    nn
  264. + Title:    Crash if all entries in kill file are obsolete.
  265. + From:    olson%anchor.esd@sgi.com (Dave Olson)
  266. + Fixed:    Patch #9 [kill.c]
  267. + 
  268. + Prog:    nn
  269. + Title:    Patch #8 uses a tri-graph in a string constant.
  270. + From:    Bo Kullmar <bk@kullmar.se>
  271. + Fixed:    Patch #9 [answer.c]
  272. + 
  273. + Prog:    nn
  274. + Title:    "P" to a group with unread articles should include read articles.
  275. + From:    Pekka Kyt|laakso <netmgr@csc.fi>
  276. +     isaac@goanna.cs.rmit.oz.au (Isaac Balbin)
  277. + Fixed:    Patch #9 [articles.c articles.h group.c newsrc.c nn.c variable.c nn.1]
  278. + 
  279. +     There is a new variable "previous-also-read" which can be
  280. +     unset to get the old "buggy" behaviour.
  281. + 
  282. + Prog:    nn
  283. + Title:    Only some commands could be bound to user-defined keymaps.
  284. + From:    KFS
  285. + Fixed:    Patch #9 [keymap.c]
  286. + 
  287. + Prog:    nn
  288. + Title:    If a command cannot be bound in a specific map, the error
  289. +     message incorrectly says that the command does not exist.
  290. + From:    rock@warp.Eng.Sun.COM (Bill Petro)
  291. + Fixed:    Patch #9 [init.c keymap.c macro.c]
  292. + 
  293. + Prog:    nnpost, nn
  294. + Title:    Entering "?" to Newsgroups: prompt will give an (ignored) REGEXP ERROR
  295. + From:    dean@coplex.uucp (Dean Brooks)
  296. + Fixed:    Patch #9 [answer.c]
  297. + 
  298. + Prog:    nn
  299. + Title:    Some "export" declarations were missing the type name ("int").
  300. + From:    eps@toaster.SFSU.EDU (Eric P. Scott) + fix
  301. + Fixed:    Patch #9 [expire.c news.c nntp.c]
  302. + 
  303. + Prog:    nnmaster
  304. + Title:    "nnmaster -k" sometimes fails to kill running master.
  305. + From:    ...
  306. + Fixed:    Patch #9 [master.c]
  307. + 
  308. +     It seems like the HUP signal is lost somewhere; the fix involves
  309. +     also sending a TERM signal and introducing some delays.
  310. + 
  311. + Prog:    nnmaster
  312. + Title:    If nnmaster is started in the nn source directory (by root), all
  313. +     sorts of problems with files changing owner to root etc. could happen.
  314. + From:    Paul Graham <pjg@acsu.buffalo.edu>
  315. + Fixed:    Patch #9 [master.c]
  316. + 
  317. + Prog:    nn, nnacct
  318. + Title:    The login name of the user is not always found correctly (it's blank).
  319. + From:    asd@mace.cc.purdue.edu (Kareth)
  320. + Fixed:    Patch #9 [global.c]
  321. + 
  322. +     It seems that if nn is invoked from xterm, getlogin may return an
  323. +     empty string instead of the user name.  nn now checks for this
  324. +     return value and uses other ways to get the user name (passwd, $USER).
  325. + 
  326. + Prog:    nn
  327. + Title:    If last article in a folder is a patch, that article's body by be lost.
  328. + From:    asd@mace.cc.purdue.edu (Kareth)
  329. + Fixed:    Patch #9 [digest.c]
  330. + 
  331. + Prog:    nn
  332. + Title:    K command in reading mode would skip to next article also when making
  333. +     an auto-select entry.  Furthermore it would keep the article selected.
  334. + From:    chuq@Apple.COM (The Bounty Hunter)
  335. + Fixed:    Patch #9 [menu.c more.c]
  336.   
  337. + 
  338.   New features since initial 6.4.0 release
  339.   ----------------------------------------
  340.   
  341. ***************
  342. *** 1252,1254 ****
  343. --- 1334,1367 ----
  344.   Title:    The proper "re prefix" is now also shown on the "*" header in read mode
  345.   From:    Uwe Doering (adapted by KFS)
  346.   Added:    Patch #8 [menu.c more.c variable.c]
  347. + 
  348. + Prog:    nn
  349. + Title:    Added ":set /regexp" to list only selected variables.
  350. + From:    KFS
  351. + Added:    Patch #9 [init.c variable.c nn.1]
  352. + 
  353. + Prog:    nn
  354. + Title:    Completion of a variable name (e.g. :set au<space>) will now
  355. +     show the current value of the variable in the message line.
  356. + From:    KFS
  357. + Added:    Patch #9 [init.c variable.c term.c nn.1]
  358. + 
  359. + Prog:    nn
  360. + Title:    New "scroll-last-lines" variable to make nn scroll last page only.
  361. + From:    KFS on request from news@m2xenix.psg.com (Randy Bush)
  362. + Added:    Patch #9 [more.c variable.c nn.1]
  363. + 
  364. +     If < 0, nn will scroll text rather than display each new page from
  365. +     the top of the screen.    If > 0, then nn will scroll the last
  366. +     "s-l-l" lines of the article (and display the rest as usual).
  367. + 
  368. + Prog:    nnacct
  369. + Title:    New "$CLIENT/admins" file where the login names of the privileged
  370. +     news administrators allowed to run nnacct besides root can be listed.
  371. + From:    KFS on request from asd@mace.cc.purdue.edu (Kareth)
  372. + Added:    Patch #9 [account.c nnacct.1m]
  373. + 
  374. + Prog:    nn
  375. + Title:    Variables can now be set on nn command line with var=value.
  376. + From:    KFS on request from asd@mace.cc.purdue.edu (Kareth)
  377. + Added:    Patch #9 [sequence.c]
  378. *** ./LAST/expire.c    Mon Jun 25 15:46:39 1990
  379. --- expire.c    Tue Jul 17 20:26:16 1990
  380. ***************
  381. *** 21,29 ****
  382.    *    3: recollect group to expire (also if "min" still exists)
  383.    */
  384.   
  385. ! export expire_method = 1;    /* expire method */
  386. ! export recollect_method = 1;    /* recollection method -- see do_expire */
  387. ! export expire_level = 0;    /* automatic expiration detection */
  388.   
  389.   #ifdef HAVE_DIRECTORY
  390.   
  391. --- 21,29 ----
  392.    *    3: recollect group to expire (also if "min" still exists)
  393.    */
  394.   
  395. ! export int expire_method = 1;    /* expire method */
  396. ! export int recollect_method = 1; /* recollection method -- see do_expire */
  397. ! export int expire_level = 0;    /* automatic expiration detection */
  398.   
  399.   #ifdef HAVE_DIRECTORY
  400.   
  401. *** ./LAST/global.c    Mon Jul 16 17:38:42 1990
  402. --- global.c    Wed Jul 18 16:29:23 1990
  403. ***************
  404. *** 93,101 ****
  405.   
  406.   sig_type catch_hangup(n)
  407.   {
  408.       signal(n, SIG_IGN);
  409.   
  410. -     s_hangup++;
  411.   #ifdef FAKE_INTERRUPT
  412.       if (fake_keyb_siglist[n] && arm_fake_keyb_sig)
  413.           longjmp(fake_keyb_sig, 1);
  414. --- 93,101 ----
  415.   
  416.   sig_type catch_hangup(n)
  417.   {
  418. +     s_hangup = 1;
  419.       signal(n, SIG_IGN);
  420.   
  421.   #ifdef FAKE_INTERRUPT
  422.       if (fake_keyb_siglist[n] && arm_fake_keyb_sig)
  423.           longjmp(fake_keyb_sig, 1);
  424. ***************
  425. *** 188,193 ****
  426. --- 188,199 ----
  427.   
  428.       process_id = getpid();
  429.   
  430. + #ifdef CLIENT_DIRECTORY
  431. +     lib_directory = CLIENT_DIRECTORY;
  432. + #else
  433. +     lib_directory = LIB_DIRECTORY;
  434. + #endif
  435. + 
  436.   #ifdef NEWS_DIRECTORY
  437.       news_directory = NEWS_DIRECTORY;
  438.   #else
  439. ***************
  440. *** 228,239 ****
  441.       /* this may later be changed by nntp_check */
  442.       news_active = mk_file_name(news_lib_directory, "active");
  443.   
  444. - #ifdef CLIENT_DIRECTORY
  445. -     lib_directory = CLIENT_DIRECTORY;
  446. - #else
  447. -     lib_directory = LIB_DIRECTORY;
  448. - #endif
  449. - 
  450.   #ifdef MASTER_DIRECTORY
  451.       master_directory = MASTER_DIRECTORY;
  452.   #else
  453. --- 234,239 ----
  454. ***************
  455. *** 606,623 ****
  456.   {
  457.       static char *user = NULL;
  458.       struct passwd *pw, *getpwuid();
  459.   
  460.       if (who_am_i == I_AM_MASTER) return "M";
  461.       if (who_am_i == I_AM_EXPIRE) return "X";
  462.   
  463.       if (user == NULL) {
  464. !     extern char *getlogin();
  465. !     if (user = getlogin()) return user;
  466.       pw = getpwuid((int)user_id);
  467. !     if (pw == NULL) user = "?";
  468. !     user = copy_str(pw->pw_name);
  469.       }
  470.   
  471.       return user;
  472.   }
  473.   
  474. --- 606,634 ----
  475.   {
  476.       static char *user = NULL;
  477.       struct passwd *pw, *getpwuid();
  478. +     extern char *getlogin(), *getenv();
  479.   
  480.       if (who_am_i == I_AM_MASTER) return "M";
  481.       if (who_am_i == I_AM_EXPIRE) return "X";
  482.   
  483.       if (user == NULL) {
  484. !     user = getlogin();
  485. !     if (user != NULL && *user != NUL) goto out;
  486. ! 
  487.       pw = getpwuid((int)user_id);
  488. !     if (pw != NULL && pw->pw_name[0] != NUL) {
  489. !         user = copy_str(pw->pw_name);
  490. !         goto out;
  491. !     }
  492. ! 
  493. !     user = getenv("LOGNAME");
  494. !     if (user != NULL && *user != NUL) goto out;
  495. !     user = getenv("USER");
  496. !     if (user != NULL && *user != NUL) goto out;
  497. !     user = "?";
  498.       }
  499.   
  500. +  out:
  501.       return user;
  502.   }
  503.   
  504. *** ./LAST/group.c    Mon Jul 16 17:38:44 1990
  505. --- group.c    Tue Jul 17 17:21:41 1990
  506. ***************
  507. *** 248,254 ****
  508.   
  509.        update_unsafe:
  510.       if ((gh->current_first = first_art) < 0) {
  511. !         if (access_mode & ACC_ORIG_NEWSRC)
  512.           gh->current_first = gh->first_article + 1;
  513.           else if (access_mode & ACC_ALSO_READ_ARTICLES)
  514.           gh->current_first = gh->first_db_article;
  515. --- 248,254 ----
  516.   
  517.        update_unsafe:
  518.       if ((gh->current_first = first_art) < 0) {
  519. !         if (access_mode & (ACC_ORIG_NEWSRC | ACC_MERGED_NEWSRC))
  520.           gh->current_first = gh->first_article + 1;
  521.           else if (access_mode & ACC_ALSO_READ_ARTICLES)
  522.           gh->current_first = gh->first_db_article;
  523. *** ./LAST/init.c    Mon Jul 16 17:38:44 1990
  524. --- init.c    Tue Jul 17 20:07:46 1990
  525. ***************
  526. *** 357,362 ****
  527. --- 357,363 ----
  528.           for (p = head; *p; )
  529.               if (*p++ == SP) return -1;
  530.           other_compl = var_completion;
  531. +         var_compl_opts(tail - buf);
  532.           tail = NULL;
  533.           temp = var_completion(head, len);
  534.           break;
  535. ***************
  536. *** 687,692 ****
  537. --- 688,697 ----
  538.       code = lookup_command(argv(3), map_def->km_flag & (K_ONLY_MENU|K_ONLY_MORE));
  539.       
  540.       switch (code) {
  541. +      case K_INVALID-1:
  542. +     init_message("Cannot bind '%s' in '%s' map", argv(3), argv(1));
  543. +     goto out;
  544. + 
  545.        case K_EQUAL_KEY:
  546.       if (argv(4) == NULL) goto mac_err;
  547.       code = map[parse_key(argv(4))];
  548. ***************
  549. *** 882,895 ****
  550.       }
  551.   
  552.       CASE( "set" ) {
  553. !         if (ARGTAIL == NULL) {
  554. !         disp_variables(0);
  555.           return AC_REDRAW;
  556.           }
  557.   
  558.           cmd = argv(1);    /* get ARGTAIL right */
  559.           if (cmd != NULL && strcmp(cmd, "all") == 0) {
  560. !         disp_variables(1);
  561.           return AC_REDRAW;
  562.           }
  563.   
  564. --- 887,900 ----
  565.       }
  566.   
  567.       CASE( "set" ) {
  568. !         if (ARGTAIL == NULL || ARGTAIL[0] == '/') {
  569. !         disp_variables(0, ARGTAIL);
  570.           return AC_REDRAW;
  571.           }
  572.   
  573.           cmd = argv(1);    /* get ARGTAIL right */
  574.           if (cmd != NULL && strcmp(cmd, "all") == 0) {
  575. !         disp_variables(1, (char *)NULL);
  576.           return AC_REDRAW;
  577.           }
  578.   
  579. ***************
  580. *** 998,1004 ****
  581.   
  582.           alt_cmd_key = lookup_command(sw_string,
  583.                    in_menu_mode ? K_ONLY_MENU : K_ONLY_MORE);
  584. !         if (alt_cmd_key != K_INVALID && alt_cmd_key != K_HELP) {
  585.           if (alt_cmd_key == K_MACRO) {
  586.               if (ARGTAIL == NULL) break;
  587.               alt_cmd_key |= atoi(ARGTAIL);
  588. --- 1003,1009 ----
  589.   
  590.           alt_cmd_key = lookup_command(sw_string,
  591.                    in_menu_mode ? K_ONLY_MENU : K_ONLY_MORE);
  592. !         if (alt_cmd_key > K_INVALID && alt_cmd_key != K_HELP) {
  593.           if (alt_cmd_key == K_MACRO) {
  594.               if (ARGTAIL == NULL) break;
  595.               alt_cmd_key |= atoi(ARGTAIL);
  596. *** ./LAST/keymap.c    Mon Jul 16 17:38:45 1990
  597. --- keymap.c    Tue Jul 17 20:07:47 1990
  598. ***************
  599. *** 583,589 ****
  600.           if (cnmp->cmd_restriction == restriction) break;
  601.            case 0:
  602.           if (cnmp->cmd_restriction == 0) break;
  603. !         return K_INVALID;
  604.            default:
  605.           break;
  606.           }
  607. --- 583,589 ----
  608.           if (cnmp->cmd_restriction == restriction) break;
  609.            case 0:
  610.           if (cnmp->cmd_restriction == 0) break;
  611. !         return K_INVALID-1;
  612.            default:
  613.           break;
  614.           }
  615. ***************
  616. *** 904,910 ****
  617.       m = &keymaps[ix];
  618.       m->km_name = copy_str(name);
  619.       m->km_map = newobj(int, KEY_MAP_SIZE);
  620. !     m->km_flag = 0;
  621.       for (kp = m->km_map; kp < &(m->km_map)[KEY_MAP_SIZE]; ) *kp++ = K_UNBOUND;
  622.   
  623.       return ix;
  624. --- 904,910 ----
  625.       m = &keymaps[ix];
  626.       m->km_name = copy_str(name);
  627.       m->km_map = newobj(int, KEY_MAP_SIZE);
  628. !     m->km_flag = K_ONLY_MORE | K_ONLY_MENU;
  629.       for (kp = m->km_map; kp < &(m->km_map)[KEY_MAP_SIZE]; ) *kp++ = K_UNBOUND;
  630.   
  631.       return ix;
  632. *** ./LAST/kill.c    Tue Jun 12 11:46:39 1990
  633. --- kill.c    Tue Jul 17 11:31:17 1990
  634. ***************
  635. *** 793,806 ****
  636.       /* DB check: if database is rebuilt, group numbers may change */
  637.       if (header.ckh_db_check != master.db_created) goto err;
  638.   
  639. !     kill_patterns = newstr(header.ckh_pattern_size);
  640.       kill_tab = newobj(kill_list_entry, header.ckh_entries);
  641.       if (regexp_table_size = header.ckh_regexp_size)
  642.       group_regexp_table = newobj(kill_group_regexp, header.ckh_regexp_size);
  643. - 
  644. -     fseek(killf, (off_t)(header.ckh_entries * sizeof(entry)), 1);
  645. -     if (fread(kill_patterns, sizeof(char), (int)header.ckh_pattern_size, killf)
  646. -     !=  header.ckh_pattern_size) goto err;
  647.   
  648.       tb = group_regexp_table;
  649.   
  650. --- 793,815 ----
  651.       /* DB check: if database is rebuilt, group numbers may change */
  652.       if (header.ckh_db_check != master.db_created) goto err;
  653.   
  654. !     if (header.ckh_entries == 0) {
  655. !     fclose(killf);
  656. !     kill_file_loaded = 1;
  657. !     return 0;
  658. !     }
  659. ! 
  660. !     if (header.ckh_pattern_size > 0) {
  661. !     kill_patterns = newstr(header.ckh_pattern_size);
  662. !     fseek(killf, (off_t)(header.ckh_entries * sizeof(entry)), 1);
  663. !     if (fread(kill_patterns, sizeof(char), (int)header.ckh_pattern_size, killf)
  664. !         !=  header.ckh_pattern_size) goto err;
  665. !     } else
  666. !     kill_patterns = newstr(1);
  667. !     
  668.       kill_tab = newobj(kill_list_entry, header.ckh_entries);
  669.       if (regexp_table_size = header.ckh_regexp_size)
  670.       group_regexp_table = newobj(kill_group_regexp, header.ckh_regexp_size);
  671.   
  672.       tb = group_regexp_table;
  673.   
  674. *** ./LAST/macro.c    Mon Jul  9 17:59:56 1990
  675. --- macro.c    Tue Jul 17 20:07:46 1990
  676. ***************
  677. *** 203,209 ****
  678.       goto ok;
  679.       }
  680.   
  681. !     if ((cmd = lookup_command(w, (K_ONLY_MENU | K_ONLY_MORE))) != K_INVALID) {
  682.       m_new(M_COMMAND);
  683.       m->m_int = GETC_COMMAND | cmd;
  684.       goto ok;
  685. --- 203,209 ----
  686.       goto ok;
  687.       }
  688.   
  689. !     if ((cmd = lookup_command(w, (K_ONLY_MENU | K_ONLY_MORE))) > K_INVALID) {
  690.       m_new(M_COMMAND);
  691.       m->m_int = GETC_COMMAND | cmd;
  692.       goto ok;
  693. *** ./LAST/man/nn.1.C    Mon Jul 16 17:38:48 1990
  694. --- man/nn.1.C    Thu Jul 19 17:52:37 1990
  695. ***************
  696. *** 42,47 ****
  697. --- 42,49 ----
  698.   .br
  699.   \- Through command line options when \fInn\fP is invoked.
  700.   .br
  701. + \- Through \fIassignments\fP on the command line when \fInn\fP is invoked.
  702. + .br
  703.   \- Through global \fBset\fP commands in the init file.
  704.   .br
  705.   \- Through \fBset\fP or \fBlocal\fP commands executed from entry macros.
  706. ***************
  707. *** 137,143 ****
  708.   .LP
  709.   The current variable settings can be shown with the
  710.   .B :set
  711. ! command without arguments.
  712.   .LP
  713.   Variables are global by default, but a local instantiation of the
  714.   variable can be created using the \fB:local\fP command.  The local
  715. --- 139,162 ----
  716.   .LP
  717.   The current variable settings can be shown with the
  718.   .B :set
  719. ! command:
  720. ! .TP
  721. ! \fB:set\fP (without arguments)
  722. ! This will give a listing of the variables which have been set in
  723. ! either the init file or interactively.
  724. ! .TP
  725. ! \fB:set all\fP
  726. ! This will give a listing of all variables.  Modified variables will be
  727. ! marked with a `*' and \fIlocal\fP variables will be marked with a `>'.
  728. ! .TP
  729. ! \fB:set /\fP\fIregexp\fP
  730. ! This will give a listing of all variables whose name matches the given
  731. ! regular expression.
  732. ! .TP
  733. ! \fB:set\fP \fIpartial-name\fP \fBspace\fP
  734. ! The \fBspace\fP (\fBcomp1-key\fP) key will complete the variable name
  735. ! as usual, but as a side effect it will display the variable's current
  736. ! value in the message line.
  737.   .LP
  738.   Variables are global by default, but a local instantiation of the
  739.   variable can be created using the \fB:local\fP command.  The local
  740. ***************
  741. *** 799,804 ****
  742. --- 818,828 ----
  743.   \fBpreview-mark-read\fP        (boolean, default true)
  744.   When set, previewing an article will mark the article as read.
  745.   .TP
  746. + \fBprevious-also-read\fP    (boolean, default true)
  747. + When set, going back to the previously read group with \fBP\fP
  748. + {\fBprevious\fP} will include articles read in the current invocation
  749. + of \fInn\fP even if there are still unread articles in the group.
  750. + .TP
  751.   \fBprint-header-lines\fP \fIfields\fP    (string, default "FDGS")
  752.   Specifies the list of header fields that are output when
  753.   an article is printed via the \fB:print\fP command and
  754. ***************
  755. *** 852,857 ****
  756. --- 876,890 ----
  757.       4:  If any references use layout 0, else layout 1.
  758.   .fi
  759.   .TP
  760. + \fBre-layout-read\fP \fIN\fP    (integer, default -1)
  761. + When the \fBheader-lines\fP variable is not set, or contains the "*"
  762. + field specifier, a line similar to the menu line will be used as the
  763. + header of the article in reading mode, including the sender's name and
  764. + the article's subject.  When this variable is negative, the subject
  765. + on this header line will be prefixed according to the \fBre-layout\fP
  766. + variable.  Otherwise, it will define the format of the "Re:" prefix to
  767. + be used instead of the \fBre-layout\fP used on the menu.
  768. + .TP
  769.   \fBread-return-next-page\fP    (boolean, default false)
  770.   When set, the \fBZ\fP {\fBread-return\fP} command will return to the
  771.   \fInext\fP menu page rather than the current menu page.
  772. ***************
  773. *** 871,876 ****
  774. --- 904,914 ----
  775.   repeat the query for a group to enter until you quit explicitly.
  776.   (Same as setting the \fB\-r\fP option permanently).
  777.   .TP
  778. + \fBreport-cost\fP        (boolean, default true)
  779. + This variable is ignored unless \fInn\fP is running with accounting
  780. + enabled (see \fInnacct\fP).  When set, \fInn\fP will report the cost
  781. + of the current session and the total on exit.
  782. + .TP
  783.   \fBresponse-check-pause\fP \fIpause\fP    (integer, default 2)
  784.   Specifies the number of seconds to wait after posting an article to
  785.   see whether the action *might* have failed.  Some commands run in the
  786. ***************
  787. *** 923,928 ****
  788. --- 961,975 ----
  789.   \fBscroll-clear-page\fP        (boolean, default true)
  790.   Determines whether \fInn\fP clears the screen before showing each new
  791.   page of an article.
  792. + .TP
  793. + \fBscroll-last-lines\fP \fIN\fP        (integer, default 0)
  794. + Normally, \fInn\fP will show each new page of an article from the top
  795. + of the screen (with proper marking of the overlap).  When this
  796. + variable is set to a negative value, \fInn\fP will scroll the text of
  797. + the new pages from the bottom of the screen instead.  If it is set to a
  798. + positive value, \fInn\fP will show pages from the top as usual, but
  799. + switch to scrolling when there are \fIless than\fP the specified
  800. + number of lines left in the article.
  801.   .TP
  802.   \fBselect-leave-next\fP        (boolean, default false)
  803.   When set, you will be asked whether to select articles with the
  804. *** ./LAST/man/nn.1.D    Mon Jul 16 17:38:48 1990
  805. --- man/nn.1.D    Thu Jul 19 17:52:37 1990
  806. ***************
  807. *** 113,118 ****
  808. --- 113,127 ----
  809.   .B toggle
  810.   command.
  811.   .LP
  812. + Besides the options described below, you can set \fIany\fP of
  813. + \fInn\fP's variables directly on the command line via an argument of
  814. + the following format:
  815. + .sp 0.5v
  816. +     variable=value
  817. + .sp 0.5v
  818. + To set or unset a boolean variable, the value can be specified as
  819. + \fIon\fP or \fIoff\fP (\fIt\fP and \fIf\fP will also work).
  820. + .LP
  821.   Notice that the init files are read \fIbefore\fP the options are
  822.   parsed (unless you use the \-\fBI\fP option).  Therefore, the options
  823.   which are related to boolean variables set in the init file will
  824. *** ./LAST/man/nnacct.1m    Mon Jul 16 17:38:49 1990
  825. --- man/nnacct.1m    Wed Jul 18 17:06:19 1990
  826. ***************
  827. *** 5,11 ****
  828.   .SH SYNOPSIS
  829.   \fBnnacct\fP \-\fBr\fP [ \-\fBf\fP file ] [ \-\fBa\fP ] [ user ]...
  830.   .br
  831. ! \fBnnacct\fP \-\fBp\fP\fIpolicy\fP \-\fBq\fP\fIquota\fP user...
  832.   .br
  833.   \fBnnacct\fP \-\fBZERO\fP
  834.   .SH DESCRIPTION
  835. --- 5,11 ----
  836.   .SH SYNOPSIS
  837.   \fBnnacct\fP \-\fBr\fP [ \-\fBf\fP file ] [ \-\fBa\fP ] [ user ]...
  838.   .br
  839. ! \fBnnacct\fP [ \-\fBp\fP\fIpolicy\fP ] [ \-\fBq\fP\fIquota\fP ] user...
  840.   .br
  841.   \fBnnacct\fP \-\fBZERO\fP
  842.   .SH DESCRIPTION
  843. ***************
  844. *** 84,89 ****
  845. --- 84,95 ----
  846.   access policies can also be defined in this file.  This allows you to
  847.   change the policies or prices without having to recompile the whole
  848.   package since only \fInnacct\fP is modified.
  849. + .SH PRIVILEGED USERS
  850. + Normally, only root is allowed to change user policy or quota, list
  851. + all user's accounting data etc.  This privilege can be shared with
  852. + other users by listing their login name in the file $CLIENT/admins.
  853. + There should be exactly one login name per line, and no blanks are
  854. + allowed.
  855.   .SH FILES
  856.   .DT
  857.   .ta \w'$db/acctlog'u+3m
  858. ***************
  859. *** 91,96 ****
  860. --- 97,104 ----
  861.   $db/acct    accounting data (accumulated per user)
  862.   .br
  863.   $db/acctlog    accounting log (grows indefinitely)
  864. + .br
  865. + $lib/admins    login names of privileged \fInnacct\fP users.
  866.   .DT
  867.   .SH SEE ALSO
  868.   nn(1), nnusage(1)
  869. *** ./LAST/master.c    Mon Jul  9 17:59:59 1990
  870. --- master.c    Wed Jul 18 11:49:12 1990
  871. ***************
  872. *** 586,595 ****
  873.       if (kill_running) {
  874.       if (proto_lock(I_AM_MASTER, PL_TERMINATE) < 0)
  875.           temp = 0;
  876. !     else
  877. !         for (temp = 10; --temp >= 0; sleep(3))
  878. !         if (proto_lock(I_AM_MASTER, PL_CHECK) < 0) break;
  879.   
  880.       if (temp < 0) {
  881.           printf("The running master will not die....!\n");
  882.           log_entry('E', "Could not kill running master");
  883. --- 586,603 ----
  884.       if (kill_running) {
  885.       if (proto_lock(I_AM_MASTER, PL_TERMINATE) < 0)
  886.           temp = 0;
  887. !     else {
  888. !         int mpid;
  889.   
  890. +         for (temp = 10; --temp >= 0; sleep(3)) {
  891. +         sleep(3);
  892. +         mpid = proto_lock(I_AM_MASTER, PL_CHECK);
  893. +         if (mpid < 0) break;
  894. +         sleep(1);
  895. +         kill(mpid, SIGTERM); /* SIGHUP lost??? */
  896. +         }
  897. +     }
  898. + 
  899.       if (temp < 0) {
  900.           printf("The running master will not die....!\n");
  901.           log_entry('E', "Could not kill running master");
  902. ***************
  903. *** 600,605 ****
  904. --- 608,618 ----
  905.           !reread_groups_file && lock_message == NULL &&
  906.           group_selection == 0 && initialize < 0)
  907.           exit(0);
  908. +     }
  909. + 
  910. +     if (!file_exist(db_directory, "drwx")) {
  911. +     fprintf(stderr, "%s invoked with wrong user privileges\n", argv[0]);
  912. +     exit(9);
  913.       }
  914.   
  915.       if (proto_lock(I_AM_MASTER, PL_SET) != 0) {
  916. *** ./LAST/menu.c    Mon Jul 16 17:38:50 1990
  917. --- menu.c    Tue Jul 17 23:06:53 1990
  918. ***************
  919. *** 326,331 ****
  920. --- 326,332 ----
  921.   }
  922.   
  923.   export long n_selected;
  924. + export int show_art_next_invalid;
  925.   
  926.   static count_selected_articles()
  927.   {
  928. ***************
  929. *** 357,362 ****
  930. --- 358,364 ----
  931.           for (next = cur+1; next < n_articles; next++) {
  932.           if (articles[next]->attr & A_SELECT) break;
  933.           }
  934. +         show_art_next_invalid = 0;
  935.   
  936.        show:
  937.           ah = articles[cur];
  938. ***************
  939. *** 390,401 ****
  940.           break;
  941.   
  942.            case MC_DO_SELECT:
  943. -         for (temp = cur+1; temp < n_articles; temp++) {
  944. -             if (auto_select_article(ah = articles[temp], 2)) {
  945. -             ah->attr = A_SELECT;
  946. -             if (temp < next) next = temp;
  947. -             }
  948. -         }
  949.           break;
  950.   
  951.            case MC_PREV:
  952. --- 392,397 ----
  953. ***************
  954. *** 465,470 ****
  955. --- 461,470 ----
  956.           return MC_NEXTGROUP;
  957.           }
  958.   
  959. +         if (show_art_next_invalid)
  960. +         for (next = cur+1; next < n_articles; next++) {
  961. +             if (articles[next]->attr & A_SELECT) break;
  962. +         }
  963.           prev = cur; cur = next;
  964.       }
  965.   
  966. *** ./LAST/more.c    Mon Jul 16 17:38:50 1990
  967. --- more.c    Wed Jul 18 15:50:37 1990
  968. ***************
  969. *** 5,10 ****
  970. --- 5,11 ----
  971.    */
  972.   
  973.   #include "config.h"
  974. + #include "articles.h"
  975.   #include "news.h"
  976.   #include "term.h"
  977.   #include "menu.h"
  978. ***************
  979. *** 26,31 ****
  980. --- 27,33 ----
  981.   export char *trusted_escapes = NULL;
  982.   export int  new_read_prompt = 1;
  983.   export int  re_layout_more = -1;
  984. + export int  scroll_last_lines = 0;
  985.   
  986.   import int  preview_window;
  987.   import int  novice;
  988. ***************
  989. *** 93,98 ****
  990. --- 95,101 ----
  991.       'x', "Back-Ref",    &news.ng_bref,        0,
  992.       'v', "Save-File",    NULL,            0,
  993.       'a', "Spool-File",    NULL,            0,
  994. +     'i', "DB-Info",    NULL,            0,
  995.       0
  996.   };
  997.   
  998. ***************
  999. *** 147,152 ****
  1000. --- 150,162 ----
  1001.       if (lp == NULL) return 0;
  1002.       if (expand_file_name(special, lp, 2)) lp = special;
  1003.       break;
  1004. + 
  1005. +      case 'i':
  1006. +     sprintf(special, "#%ld fl=%lx re=%d li=%d hp=%ld fp=%ld lp=%ld",
  1007. +         (long)ah->a_number, (long)ah->flag, ah->replies, ah->lines,
  1008. +         (long)ah->hpos, (long)ah->fpos, (long)ah->lpos);
  1009. +     lp = special;
  1010. +     break;
  1011.       }
  1012.       if (lp == NULL) return 0;
  1013.   
  1014. ***************
  1015. *** 207,212 ****
  1016. --- 217,244 ----
  1017.       return 0;
  1018.   }
  1019.   
  1020. + static do_auto_select()
  1021. + {
  1022. +     register article_header *ah;
  1023. +     register int32 n;
  1024. +     import int show_art_next_invalid;
  1025. +     int count = 0;
  1026. + 
  1027. +     for (n = 0; n < n_articles; n++) {
  1028. +     ah = articles[n];
  1029. +     if (ah->attr == A_READ) continue;
  1030. +     if (ah->attr & A_SELECT) continue;
  1031. + 
  1032. +     if (auto_select_article(ah, 2)) {
  1033. +         ah->attr = A_AUTO_SELECT;
  1034. +         show_art_next_invalid = 1;
  1035. +         count++;
  1036. +     }
  1037. +     }
  1038. + 
  1039. +     if (count) msg("Selected %d articles", count);
  1040. + }
  1041. + 
  1042.   static char *a_st_flags(flag)
  1043.   flag_type flag;
  1044.   {
  1045. ***************
  1046. *** 269,274 ****
  1047. --- 301,308 ----
  1048.       struct news_header news_save;
  1049.       struct digest_header digest_save;
  1050.       int linenum, maxline, topline, print_lines, lno1;
  1051. +     int scroll_lines, scroll_from;
  1052. +     off_t scroll_offset;
  1053.       int underline_line, fake_underline;
  1054.       int match_lines, match_redraw, match_topline, match_botline;
  1055.       int goto_line, prev_goto, stop_line, extra_lines;
  1056. ***************
  1057. *** 372,377 ****
  1058. --- 406,422 ----
  1059.       fake_underline = 0;
  1060.       shade_overlap = 0;
  1061.   
  1062. +     scroll_lines = scroll_from = 0;
  1063. +     scroll_offset = 0;
  1064. +     if (scroll_last_lines < 0)
  1065. +     scroll_from = -1;
  1066. +     else if (scroll_last_lines > 0) {
  1067. +     if (ah->lines > 0)
  1068. +         scroll_from = ah->lines - scroll_last_lines;
  1069. +     else
  1070. +         scroll_offset = ah->lpos - (scroll_last_lines * 64);
  1071. +     }
  1072. + 
  1073.       stop_line = first_page_lines ? first_page_lines : -1;
  1074.   
  1075.       if (new_read_prompt) {
  1076. ***************
  1077. *** 877,882 ****
  1078. --- 922,938 ----
  1079.   
  1080.       if (eof && lno == screen_offset) more_return(MC_NEXT);
  1081.   
  1082. +     if (scroll_lines > 0) {
  1083. +     if (eof)
  1084. +         scroll_lines = 0;
  1085. +     else {
  1086. +         print_lines = 1;
  1087. +         scroll_lines--;
  1088. +         prompt_line = lno;
  1089. +         goto scroll_next;
  1090. +     }
  1091. +     }
  1092. +     
  1093.       raw();
  1094.   
  1095.       prompt_line = lno;
  1096. ***************
  1097. *** 950,955 ****
  1098. --- 1006,1017 ----
  1099.        case K_CONTINUE:
  1100.       if (eof) break;
  1101.       if (screen_offset == 0 && form_feed == 0 && stop_line) {
  1102. +         if ((scroll_from && linenum > scroll_from) ||
  1103. +         (scroll_offset && ftell(art) > scroll_offset)) {
  1104. +         scroll_lines = Lines - 2 - overlap;
  1105. +         print_lines = 1;
  1106. +         goto scroll;
  1107. +         }
  1108.           if (linenum > overlap) {
  1109.           underline_line = linenum;
  1110.           linenum -= overlap;
  1111. ***************
  1112. *** 1077,1083 ****
  1113.        case K_KILL_HANDLING:
  1114.       switch (kill_menu(ah)) {
  1115.        case 0:
  1116. !         more_return(MC_DO_SELECT);
  1117.        case 1:
  1118.           more_return(MC_DO_KILL);
  1119.        default:
  1120. --- 1139,1147 ----
  1121.        case K_KILL_HANDLING:
  1122.       switch (kill_menu(ah)) {
  1123.        case 0:
  1124. !         do_auto_select();
  1125. !         ah->attr = 0;
  1126. !         break;
  1127.        case 1:
  1128.           more_return(MC_DO_KILL);
  1129.        default:
  1130. ***************
  1131. *** 1147,1152 ****
  1132. --- 1211,1218 ----
  1133.           goto next_page;
  1134.   
  1135.       stop_line = -1;
  1136. + 
  1137. +      scroll_next:
  1138.       gotoxy(0, Lines-1);
  1139.       c = print_lines + lno - Lines + 2;
  1140.       while (--c >= 0) {
  1141. *** ./LAST/news.c    Mon Jul 16 17:38:51 1990
  1142. --- news.c    Tue Jul 17 20:26:15 1990
  1143. ***************
  1144. *** 7,13 ****
  1145.   #include "config.h"
  1146.   #include "news.h"
  1147.   
  1148. ! export retry_on_error = 0;
  1149.   
  1150.   char *parse_header(f, hdr_field, modes, hdrbuf)
  1151.   FILE             *f;
  1152. --- 7,13 ----
  1153.   #include "config.h"
  1154.   #include "news.h"
  1155.   
  1156. ! export int retry_on_error = 0;
  1157.   
  1158.   char *parse_header(f, hdr_field, modes, hdrbuf)
  1159.   FILE             *f;
  1160. *** ./LAST/newsrc.c    Mon Jul 16 17:38:51 1990
  1161. --- newsrc.c    Tue Jul 17 19:17:50 1990
  1162. ***************
  1163. *** 491,541 ****
  1164.    * prepare to use newsrc & select information for a specific group
  1165.    */
  1166.   
  1167. ! static char *rc_p;        /* pointer into newsrc_line */
  1168. ! static article_number rc_min;    /* current newsrc range min */
  1169. ! static article_number rc_max;    /* current newsrc range max */
  1170. ! static char rc_delim;        /* delimiter character */
  1171. ! 
  1172. ! static char *sel_p;        /* pointer into select_line */
  1173. ! static char *sel_initp;        /* rc_p after initialization */
  1174. ! static article_number sel_min;    /* current select range min */
  1175. ! static article_number sel_max;    /* current select range max */
  1176. ! static article_number sel_digest; /* current digest */
  1177. ! static attr_type sel_type;    /* current select range type */
  1178. ! static char sel_delim;        /* delimiter character */
  1179.   
  1180.   
  1181. ! use_newsrc(gh, use_orig)
  1182. ! register group_header *gh;
  1183. ! int use_orig;
  1184.   {
  1185. ! /*    TR( ("===%s===", gh->group_name) );*/
  1186. ! 
  1187. !     if (use_orig) {
  1188. !     rc_p = gh->newsrc_orig;
  1189. !     sel_p = gh->select_orig;
  1190.       } else {
  1191. !     rc_p = gh->newsrc_line;
  1192. !     sel_p = gh->select_line;
  1193.       }
  1194.   
  1195. !     if (rc_p == NULL) {
  1196. !     rc_min = rc_max = END_OF_LIST;
  1197.       } else {
  1198. !     rc_min = rc_max = -1;
  1199. !     rc_delim = SP;
  1200. !     rc_p += gh->group_name_length + 1;
  1201.       }
  1202.   
  1203. !     sel_digest = 0;
  1204. !     if (sel_p == NULL) {
  1205. !     sel_min = sel_max = END_OF_LIST;
  1206. !     } else {
  1207. !     sel_p += gh->group_name_length + 1;
  1208. !     sel_min = sel_max = -1;
  1209. !     sel_delim = SP;
  1210.       }
  1211.   }
  1212.   /*
  1213.   #define TRC(wh)  TR( ("r%d>%-8.8s< %ld %ld %ld %c\n", wh, p ? p : "***", n, rc_min, rc_max, rc_delim) )
  1214.   #define TSEL(wh) TR( ("s%d>%-8.8s< %ld %ld %ld %c\n", wh, p ? p : "***", n, sel_min, sel_max, sel_delim) )
  1215. --- 491,560 ----
  1216.    * prepare to use newsrc & select information for a specific group
  1217.    */
  1218.   
  1219. ! static struct rc_info {
  1220. !     char *rc_p;            /* pointer into newsrc_line */
  1221. !     article_number rc_min;    /* current newsrc range min */
  1222. !     article_number rc_max;    /* current newsrc range max */
  1223. !     char rc_delim;        /* delimiter character */
  1224. ! 
  1225. !     char *sel_p;        /* pointer into select_line */
  1226. !     char *sel_initp;        /* rc_p after initialization */
  1227. !     article_number sel_min;    /* current select range min */
  1228. !     article_number sel_max;    /* current select range max */
  1229. !     article_number sel_digest;    /* current digest */
  1230. !     attr_type sel_type;        /* current select range type */
  1231. !     char sel_delim;        /* delimiter character */
  1232. ! } orig, cur;
  1233.   
  1234. + static int rctest_mode;
  1235.   
  1236. ! static init_rctest(gh, r)
  1237. ! group_header *gh;
  1238. ! register struct rc_info *r;
  1239.   {
  1240. !     if (r->rc_p == NULL) {
  1241. !     r->rc_min = r->rc_max = END_OF_LIST;
  1242.       } else {
  1243. !     r->rc_min = r->rc_max = -1;
  1244. !     r->rc_delim = SP;
  1245. !     r->rc_p += gh->group_name_length + 1;
  1246.       }
  1247.   
  1248. !     r->sel_digest = 0;
  1249. !     if (r->sel_p == NULL) {
  1250. !     r->sel_min = r->sel_max = END_OF_LIST;
  1251.       } else {
  1252. !     r->sel_p += gh->group_name_length + 1;
  1253. !     r->sel_min = r->sel_max = -1;
  1254. !     r->sel_delim = SP;
  1255.       }
  1256. + }
  1257. + 
  1258. + use_newsrc(gh, mode)
  1259. + register group_header *gh;
  1260. + int mode;
  1261. + {
  1262. +     orig.rc_p = gh->newsrc_orig;
  1263. +     orig.sel_p = gh->select_orig;
  1264. +     cur.rc_p = gh->newsrc_line;
  1265. +     cur.sel_p = gh->select_line;
  1266.   
  1267. !     rctest_mode = mode;
  1268. ! 
  1269. !     switch (mode) {
  1270. !      case 0:
  1271. !     init_rctest(gh, &cur);
  1272. !     break;
  1273. !      case 1:
  1274. !     init_rctest(gh, &orig);
  1275. !     break;
  1276. !      case 2:
  1277. !     init_rctest(gh, &cur);
  1278. !     init_rctest(gh, &orig);
  1279. !     break;
  1280.       }
  1281.   }
  1282. + 
  1283.   /*
  1284.   #define TRC(wh)  TR( ("r%d>%-8.8s< %ld %ld %ld %c\n", wh, p ? p : "***", n, rc_min, rc_max, rc_delim) )
  1285.   #define TSEL(wh) TR( ("s%d>%-8.8s< %ld %ld %ld %c\n", wh, p ? p : "***", n, sel_min, sel_max, sel_delim) )
  1286. ***************
  1287. *** 543,570 ****
  1288.   #define TRC(wh)
  1289.   #define TSEL(wh)
  1290.   
  1291. ! attr_type test_article(ah)
  1292.   register article_header *ah;
  1293.   {
  1294.       register char *p;
  1295.       register int c;
  1296.       register int32 n = ah->a_number, x;
  1297.   
  1298. !     while (n > rc_max) {
  1299.       /* get next interval from newsrc line */
  1300. !     rc_min = -1;
  1301.       x = 0;
  1302. !     p = rc_p;
  1303.       TRC(1);
  1304.   
  1305.       if (*p == RC_DELIM) p++;
  1306.       if (*p == NUL || *p == NL)
  1307. !         rc_min = rc_max = END_OF_LIST;
  1308.       else {
  1309.           for ( ; (c = *p) && c != RC_DELIM && c != NL; p++) {
  1310.           if (c == RC_RANGE) {
  1311. !             if (rc_min < 0)
  1312. !             rc_min = x;
  1313.               else
  1314.               msg("syntax error in rc file");
  1315.               x = 0;
  1316. --- 562,590 ----
  1317.   #define TRC(wh)
  1318.   #define TSEL(wh)
  1319.   
  1320. ! static attr_type rctest(ah, r)
  1321.   register article_header *ah;
  1322. + register struct rc_info *r;
  1323.   {
  1324.       register char *p;
  1325.       register int c;
  1326.       register int32 n = ah->a_number, x;
  1327.   
  1328. !     while (n > r->rc_max) {
  1329.       /* get next interval from newsrc line */
  1330. !     r->rc_min = -1;
  1331.       x = 0;
  1332. !     p = r->rc_p;
  1333.       TRC(1);
  1334.   
  1335.       if (*p == RC_DELIM) p++;
  1336.       if (*p == NUL || *p == NL)
  1337. !         r->rc_min = r->rc_max = END_OF_LIST;
  1338.       else {
  1339.           for ( ; (c = *p) && c != RC_DELIM && c != NL; p++) {
  1340.           if (c == RC_RANGE) {
  1341. !             if (r->rc_min < 0)
  1342. !             r->rc_min = x;
  1343.               else
  1344.               msg("syntax error in rc file");
  1345.               x = 0;
  1346. ***************
  1347. *** 574,604 ****
  1348.           if (isascii(*p) && isdigit(*p))
  1349.               x = x*10 + c - '0';
  1350.           }
  1351. !         rc_max = x;
  1352. !         if (rc_min < 0) rc_min = x;
  1353. !         rc_p = p;
  1354.       }
  1355.       }
  1356.       TRC(2);
  1357.   
  1358. !     if (n >= rc_min && n <= rc_max) return A_READ;
  1359.   
  1360. !     p = sel_p;
  1361. !     if (sel_digest != 0) {
  1362. !     if (n == sel_digest && (ah->flag & A_DIGEST)) {
  1363. !         if (*sel_p == SEL_END_DIGEST) return A_READ;
  1364.           n = ah->fpos;
  1365.       } else {
  1366. !         if (n < sel_digest) return 0;
  1367.           while (*p && *p++ != SEL_END_DIGEST);
  1368. !         sel_digest = 0;
  1369. !         sel_min = sel_max = -1;
  1370.       }
  1371.       }
  1372.   
  1373. !     while (n > sel_max) {
  1374. !     sel_min = -1;
  1375. !     sel_type = A_SELECT;
  1376.       x = 0;
  1377.       TSEL(3);
  1378.   
  1379. --- 594,624 ----
  1380.           if (isascii(*p) && isdigit(*p))
  1381.               x = x*10 + c - '0';
  1382.           }
  1383. !         r->rc_max = x;
  1384. !         if (r->rc_min < 0) r->rc_min = x;
  1385. !         r->rc_p = p;
  1386.       }
  1387.       }
  1388.       TRC(2);
  1389.   
  1390. !     if (n >= r->rc_min && n <= r->rc_max) return A_READ;
  1391.   
  1392. !     p = r->sel_p;
  1393. !     if (r->sel_digest != 0) {
  1394. !     if (n == r->sel_digest && (ah->flag & A_DIGEST)) {
  1395. !         if (*(r->sel_p) == SEL_END_DIGEST) return A_READ;
  1396.           n = ah->fpos;
  1397.       } else {
  1398. !         if (n < r->sel_digest) return 0;
  1399.           while (*p && *p++ != SEL_END_DIGEST);
  1400. !         r->sel_digest = 0;
  1401. !         r->sel_min = r->sel_max = -1;
  1402.       }
  1403.       }
  1404.   
  1405. !     while (n > r->sel_max) {
  1406. !     r->sel_min = -1;
  1407. !     r->sel_type = A_SELECT;
  1408.       x = 0;
  1409.       TSEL(3);
  1410.   
  1411. ***************
  1412. *** 605,623 ****
  1413.       for (;;) {
  1414.           switch (*p) {
  1415.            case SEL_SELECT:
  1416. !         sel_type = A_SELECT;
  1417.           p++;
  1418.           continue;
  1419.            case SEL_LEAVE:
  1420. !         sel_type = A_LEAVE;
  1421.           p++;
  1422.           continue;
  1423.            case SEL_SEEN:
  1424. !         sel_type = A_SEEN;
  1425.           p++;
  1426.           continue;
  1427.            case SEL_UNREAD:
  1428. !         sel_type = 0;
  1429.           p++;
  1430.           continue;
  1431.            case SEL_DIGEST:
  1432. --- 625,643 ----
  1433.       for (;;) {
  1434.           switch (*p) {
  1435.            case SEL_SELECT:
  1436. !         r->sel_type = A_SELECT;
  1437.           p++;
  1438.           continue;
  1439.            case SEL_LEAVE:
  1440. !         r->sel_type = A_LEAVE;
  1441.           p++;
  1442.           continue;
  1443.            case SEL_SEEN:
  1444. !         r->sel_type = A_SEEN;
  1445.           p++;
  1446.           continue;
  1447.            case SEL_UNREAD:
  1448. !         r->sel_type = 0;
  1449.           p++;
  1450.           continue;
  1451.            case SEL_DIGEST:
  1452. ***************
  1453. *** 624,638 ****
  1454.           while (*p && *p++ != SEL_END_DIGEST);
  1455.           continue;
  1456.            case SEL_END_DIGEST:
  1457. !         if (sel_digest) {
  1458. !             if (sel_digest == ah->a_number) {
  1459. !             sel_p = p;
  1460.               return A_READ;
  1461.               }
  1462. !             sel_digest = 0;
  1463.           }
  1464.           p++;
  1465. !         sel_type = A_SELECT;
  1466.           continue;
  1467.            default:
  1468.           break;
  1469. --- 644,658 ----
  1470.           while (*p && *p++ != SEL_END_DIGEST);
  1471.           continue;
  1472.            case SEL_END_DIGEST:
  1473. !         if (r->sel_digest) {
  1474. !             if (r->sel_digest == ah->a_number) {
  1475. !             r->sel_p = p;
  1476.               return A_READ;
  1477.               }
  1478. !             r->sel_digest = 0;
  1479.           }
  1480.           p++;
  1481. !         r->sel_type = A_SELECT;
  1482.           continue;
  1483.            default:
  1484.           break;
  1485. ***************
  1486. *** 641,647 ****
  1487.       }
  1488.   
  1489.       if (*p == NUL || *p == NL) {
  1490. !         sel_min = sel_max = END_OF_LIST;
  1491.           break;
  1492.       }
  1493.   
  1494. --- 661,667 ----
  1495.       }
  1496.   
  1497.       if (*p == NUL || *p == NL) {
  1498. !         r->sel_min = r->sel_max = END_OF_LIST;
  1499.           break;
  1500.       }
  1501.   
  1502. ***************
  1503. *** 667,674 ****
  1504.           break;
  1505.   
  1506.            case SEL_RANGE:
  1507. !         if (sel_min < 0)
  1508. !             sel_min = x;
  1509.           else
  1510.               msg("syntax error in sel file");
  1511.           x = 0;
  1512. --- 687,694 ----
  1513.           break;
  1514.   
  1515.            case SEL_RANGE:
  1516. !         if (r->sel_min < 0)
  1517. !             r->sel_min = x;
  1518.           else
  1519.               msg("syntax error in sel file");
  1520.           x = 0;
  1521. ***************
  1522. *** 682,690 ****
  1523.               break;
  1524.           }
  1525.           p++;
  1526. !         sel_digest = x;
  1527. !         if (n < sel_digest) {
  1528. !             sel_p = p;
  1529.               return 0;
  1530.           }
  1531.           n = ah->fpos;
  1532. --- 702,710 ----
  1533.               break;
  1534.           }
  1535.           p++;
  1536. !         r->sel_digest = x;
  1537. !         if (n < r->sel_digest) {
  1538. !             r->sel_p = p;
  1539.               return 0;
  1540.           }
  1541.           n = ah->fpos;
  1542. ***************
  1543. *** 692,725 ****
  1544.           break;
  1545.   
  1546.            case NL:
  1547. !         if (sel_digest == 0) break;
  1548.           /* fall thru */
  1549.            case SEL_END_DIGEST:
  1550. !         if (sel_digest == ah->a_number) {
  1551. !             sel_p = p;
  1552. !             return (ah->fpos == x) ? sel_type : A_READ;
  1553.           }
  1554. !         sel_digest = 0;
  1555.           x = -1;
  1556.           break;
  1557.           }
  1558.           break;
  1559.       }
  1560. !     sel_max = x;
  1561. !     if (sel_min < 0) sel_min = x;
  1562. !     sel_p = p;
  1563.       }
  1564.   
  1565. !     if (n >= sel_min && n <= sel_max) return sel_type;
  1566.   
  1567. !     if (sel_digest) return A_READ; /* only read articles are not listed */
  1568.   
  1569.       return 0;    /* unread, unseen, unselected */
  1570.   }
  1571.   
  1572.   /*
  1573.    * We only mark the articles that should remain unread
  1574.    */
  1575.   
  1576.   /*VARARGS*/
  1577.   static append(va_alist)
  1578. --- 712,773 ----
  1579.           break;
  1580.   
  1581.            case NL:
  1582. !         if (r->sel_digest == 0) break;
  1583.           /* fall thru */
  1584.            case SEL_END_DIGEST:
  1585. !         if (r->sel_digest == ah->a_number) {
  1586. !             r->sel_p = p;
  1587. !             return (ah->fpos == x) ? r->sel_type : A_READ;
  1588.           }
  1589. !         r->sel_digest = 0;
  1590.           x = -1;
  1591.           break;
  1592.           }
  1593.           break;
  1594.       }
  1595. !     r->sel_max = x;
  1596. !     if (r->sel_min < 0) r->sel_min = x;
  1597. !     r->sel_p = p;
  1598.       }
  1599.   
  1600. !     if (n >= r->sel_min && n <= r->sel_max) return r->sel_type;
  1601.   
  1602. !     if (r->sel_digest) return A_READ; /* only read articles are not listed */
  1603.   
  1604.       return 0;    /* unread, unseen, unselected */
  1605.   }
  1606.   
  1607. + attr_type test_article(ah)
  1608. + article_header *ah;
  1609. + {
  1610. +     attr_type a;
  1611. + 
  1612. +     switch (rctest_mode) {
  1613. +      case 0:
  1614. +     return rctest(ah, &cur);
  1615. +      case 1:
  1616. +     return rctest(ah, &orig);
  1617. +      case 2:
  1618. +     a = rctest(ah, &cur);
  1619. +     if (a != A_READ) return a;
  1620. +     if (rctest(ah, &orig) == A_READ) return A_KILL;
  1621. +     return a;
  1622. +     }
  1623. + }
  1624. + 
  1625.   /*
  1626.    * We only mark the articles that should remain unread
  1627.    */
  1628. + static char *rc_p;        /* pointer into newsrc_line */
  1629. + static article_number rc_min;    /* current newsrc range min */
  1630. + static char rc_delim;        /* delimiter character */
  1631. + 
  1632. + static char *sel_p;        /* pointer into select_line */
  1633. + static char *sel_initp;        /* rc_p after initialization */
  1634. + static article_number sel_min;    /* current select range min */
  1635. + static article_number sel_max;    /* current select range max */
  1636. + static article_number sel_digest; /* current digest */
  1637. + static char sel_delim;        /* delimiter character */
  1638.   
  1639.   /*VARARGS*/
  1640.   static append(va_alist)
  1641. ***************
  1642. *** 821,826 ****
  1643. --- 869,876 ----
  1644.    out:
  1645.       if ((gh->last_article = get_last_article(gh)) < 0)
  1646.       gh->last_article = 0;
  1647. +     if (gh->last_article < gh->first_article)
  1648. +     gh->first_article = gh->last_article;
  1649.   
  1650.       gh->group_flag |= G_READ;    /* should not call update_group again */
  1651.       if (mark_counter > 0) {
  1652. ***************
  1653. *** 1072,1084 ****
  1654.       count = gh->unread_count;
  1655.   
  1656.       for (n = gh->last_article + 1; n <= last; n++) {
  1657. !     if (rc_min == END_OF_LIST) {
  1658.           /* current & rest is unread */
  1659.           last = n - 1;
  1660.           break;
  1661.       }
  1662.       ahdr.a_number = n;
  1663. !     if ((attr = test_article(&ahdr)) == A_READ) continue;
  1664.       if (at >= atmax) {
  1665.           atmax += 100;
  1666.           numtab = resizeobj(numtab, article_number, atmax);
  1667. --- 1122,1134 ----
  1668.       count = gh->unread_count;
  1669.   
  1670.       for (n = gh->last_article + 1; n <= last; n++) {
  1671. !     if (cur.rc_min == END_OF_LIST) {
  1672.           /* current & rest is unread */
  1673.           last = n - 1;
  1674.           break;
  1675.       }
  1676.       ahdr.a_number = n;
  1677. !     if ((attr = rctest(&ahdr, &cur)) == A_READ) continue;
  1678.       if (at >= atmax) {
  1679.           atmax += 100;
  1680.           numtab = resizeobj(numtab, article_number, atmax);
  1681. ***************
  1682. *** 1213,1223 ****
  1683.       for (ahdr.a_number = gh->last_article + 1;
  1684.            ahdr.a_number <= gh->last_db_article;
  1685.            ahdr.a_number++) {
  1686. !         if (rc_min == END_OF_LIST) {
  1687.           gh->unread_count += gh->last_db_article - ahdr.a_number + 1;
  1688.           break;
  1689.           }
  1690. !         if (test_article(&ahdr) != A_READ)
  1691.           gh->unread_count++;
  1692.       }
  1693.       }
  1694. --- 1263,1273 ----
  1695.       for (ahdr.a_number = gh->last_article + 1;
  1696.            ahdr.a_number <= gh->last_db_article;
  1697.            ahdr.a_number++) {
  1698. !         if (cur.rc_min == END_OF_LIST) {
  1699.           gh->unread_count += gh->last_db_article - ahdr.a_number + 1;
  1700.           break;
  1701.           }
  1702. !         if (rctest(&ahdr, &cur) != A_READ)
  1703.           gh->unread_count++;
  1704.       }
  1705.       }
  1706. *** ./LAST/nn.c    Mon Jul 16 17:38:52 1990
  1707. --- nn.c    Tue Jul 17 18:25:26 1990
  1708. ***************
  1709. *** 37,42 ****
  1710. --- 37,43 ----
  1711.       do_kill_handling = 1,
  1712.       group_name_args = 0,
  1713.       merged_menu = 0,
  1714. +     prev_also_read = 1,
  1715.       repeat_group_query = 0,
  1716.       report_cost_on_exit = 1,
  1717.       show_motd_on_entry = 1,
  1718. ***************
  1719. *** 251,256 ****
  1720. --- 252,259 ----
  1721.           prev = tmp;
  1722.           if (gh->unread_count <= 0)
  1723.           group_mode |= ACC_ORIG_NEWSRC;
  1724. +         else if (prev_also_read)
  1725. +         group_mode |= ACC_MERGED_NEWSRC;
  1726.           goto enter_direct;
  1727.   
  1728.        case ME_NEXT:
  1729. *** ./LAST/nntp.c    Mon Jul  9 18:00:04 1990
  1730. --- nntp.c    Tue Jul 17 20:49:19 1990
  1731. ***************
  1732. *** 51,57 ****
  1733.   export int nntp_failed = 0;    /* bool: t iff connection is broken in
  1734.                      nntp_get_article() or nntp_get_active() */
  1735.   
  1736. ! export nntp_cache_size = NNTPCACHE;
  1737.   export char *nntp_cache_dir = NULL;
  1738.   
  1739.   export int nntp_local_server = 0;
  1740. --- 51,57 ----
  1741.   export int nntp_failed = 0;    /* bool: t iff connection is broken in
  1742.                      nntp_get_article() or nntp_get_active() */
  1743.   
  1744. ! export int nntp_cache_size = NNTPCACHE;
  1745.   export char *nntp_cache_dir = NULL;
  1746.   
  1747.   export int nntp_local_server = 0;
  1748. *** ./LAST/patchlevel.h    Mon Jul 16 17:38:53 1990
  1749. --- patchlevel.h    Wed Jul 18 16:05:11 1990
  1750. ***************
  1751. *** 19,25 ****
  1752.    *    1990-06-25: Patch #6 (6.4.6) - MEDIUM
  1753.    *    1990-07-09: Patch #7 (6.4.7) - LOW
  1754.    *    1990-07-16: Patch #8 (6.4.8) - HIGH
  1755.    */
  1756.   
  1757. ! #define PATCHLEVEL 8
  1758.   
  1759. --- 19,26 ----
  1760.    *    1990-06-25: Patch #6 (6.4.6) - MEDIUM
  1761.    *    1990-07-09: Patch #7 (6.4.7) - LOW
  1762.    *    1990-07-16: Patch #8 (6.4.8) - HIGH
  1763. +  *    1990-07-19: Patch #9 (6.4.9) - MEDIUM
  1764.    */
  1765.   
  1766. ! #define PATCHLEVEL 9
  1767.   
  1768. *** ./LAST/sequence.c    Tue May 22 12:53:57 1990
  1769. --- sequence.c    Wed Jul 18 19:54:09 1990
  1770. ***************
  1771. *** 430,435 ****
  1772. --- 430,437 ----
  1773.       register group_header *gh;
  1774.       group_header *get_group_search();
  1775.       register char *group;
  1776. +     register char *value;
  1777. +     int non_vars;
  1778.       int found, any, errors, gnum;
  1779.   
  1780.       group_sequence = NULL;
  1781. ***************
  1782. *** 436,442 ****
  1783. --- 438,446 ----
  1784.       also_subgroups = 0;
  1785.   
  1786.       any = errors = 0;
  1787. +     non_vars = 0;
  1788.       while (group = *groups++) {
  1789. +     non_vars++;
  1790.   
  1791.       if (hex_group_args) {
  1792.           sscanf(group, "%x", &gnum);
  1793. ***************
  1794. *** 451,456 ****
  1795. --- 455,467 ----
  1796.           continue;
  1797.       }
  1798.   
  1799. +     if (value = strchr(group, '=')) {
  1800. +         *value++ = NUL;
  1801. +         set_variable(group, 1, value);
  1802. +         non_vars--;
  1803. +         continue;
  1804. +     }
  1805. + 
  1806.       if (*group == '+' || *group == '~' || file_exist(group, "fr")) {
  1807.           faked_entry(group, G_FOLDER);
  1808.           any++;
  1809. ***************
  1810. *** 490,495 ****
  1811. --- 501,509 ----
  1812.       } else
  1813.           any++;
  1814.       }
  1815. + 
  1816. +     if (non_vars == 0)
  1817. +     return normal_group_sequence();
  1818.   
  1819.       end_sequence();
  1820.   
  1821. *** ./LAST/term.c    Mon Jul 16 17:38:54 1990
  1822. --- term.c    Tue Jul 17 21:21:16 1990
  1823. ***************
  1824. *** 317,322 ****
  1825. --- 317,324 ----
  1826.   
  1827.       if (batch_mode) {
  1828.       term_name = "batch";
  1829. +     close(0);
  1830. +     open("/dev/null", 0);
  1831.       return;
  1832.       }
  1833.   
  1834. ***************
  1835. *** 1078,1090 ****
  1836.   
  1837.       if (completion != NULL_FCT) {
  1838.           if (comp_used && c == erase_key) {
  1839. -         CALL(completion)(buf, -1);
  1840. -         if (did_help) { clrmsg(i); did_help = 0; }
  1841.           if (comp_len) {
  1842.               i -= comp_len;
  1843.               while (--comp_len >= 0) putchar(BS);
  1844.               clrline();
  1845.           }
  1846.           comp_len = comp_used = 0;
  1847.           if (lastc == help_key) goto no_completion;
  1848.           continue;
  1849. --- 1080,1093 ----
  1850.   
  1851.       if (completion != NULL_FCT) {
  1852.           if (comp_used && c == erase_key) {
  1853.           if (comp_len) {
  1854.               i -= comp_len;
  1855.               while (--comp_len >= 0) putchar(BS);
  1856.               clrline();
  1857.           }
  1858. +         if (!CALL(completion)(buf, -(i+1)) && did_help)
  1859. +             clrmsg(i);
  1860. +         did_help = 0;
  1861.           comp_len = comp_used = 0;
  1862.           if (lastc == help_key) goto no_completion;
  1863.           continue;
  1864. ***************
  1865. *** 1145,1152 ****
  1866.           }
  1867.   
  1868.           if (comp_used) {
  1869. !         CALL(completion)(buf, -1);
  1870. !         if (did_help) clrmsg(i);
  1871.           comp_len = comp_used = 0;
  1872.           }
  1873.       }
  1874. --- 1148,1156 ----
  1875.           }
  1876.   
  1877.           if (comp_used) {
  1878. !         if (!CALL(completion)(buf, -(i+1)) && did_help)
  1879. !             clrmsg(i);
  1880. !         did_help = 0;
  1881.           comp_len = comp_used = 0;
  1882.           }
  1883.       }
  1884. *** ./LAST/variable.c    Mon Jul 16 17:38:55 1990
  1885. --- variable.c    Wed Jul 18 19:54:09 1990
  1886. ***************
  1887. *** 94,99 ****
  1888. --- 94,100 ----
  1889.       monitor_mode,
  1890.       new_read_prompt,
  1891.       novice,
  1892. +     prev_also_read,
  1893.       preview_mark_read,
  1894.       query_signature,
  1895.       quick_save,
  1896. ***************
  1897. *** 155,160 ****
  1898. --- 156,162 ----
  1899.       response_check_pause,
  1900.       retry_on_error,
  1901.       save_counter_offset,
  1902. +     scroll_last_lines,
  1903.       show_purpose_mode,
  1904.       slow_speed,
  1905.       sort_mode,
  1906. ***************
  1907. *** 320,325 ****
  1908. --- 322,328 ----
  1909.       "patch-command",        STR SAFE 1,    (char **)patch_command,
  1910.       "preview-continuation",     INT 0,        (char **)&preview_continuation,
  1911.       "preview-mark-read",    BOOL 0,        (char **)&preview_mark_read,
  1912. +     "previous-also-read",    BOOL 0,        (char **)&prev_also_read,
  1913.       "print-header-lines",    STR 0,        (char **)&print_header_lines,
  1914.       "print-header-type",    INT 0,        (char **)&print_header_type,
  1915.       "printer",            STR SAFE 1,    (char **)printer,
  1916. ***************
  1917. *** 342,347 ****
  1918. --- 345,351 ----
  1919.       "save-header-lines",    STR 0,        (char **)&save_header_lines,
  1920.       "save-report",        BOOL 0,        (char **)&save_report,
  1921.       "scroll-clear-page",    BOOL 0,        (char **)&scroll_clear_page,
  1922. +     "scroll-last-lines",    INT 0,        (char **)&scroll_last_lines,
  1923.       "select-leave-next",    BOOL 0,        (char **)&select_leave_next,
  1924.       "select-on-sender",        BOOL 0,        (char **)&select_on_sender,
  1925.       "shading-off",        CODES 0,    (char **)&shade_off_attr,
  1926. ***************
  1927. *** 604,609 ****
  1928. --- 608,614 ----
  1929.           article_limit = (on && value > 0) ? value : -1;
  1930.           break;
  1931.       }
  1932. +     break;
  1933.   
  1934.        case V_CODES:
  1935.       {
  1936. ***************
  1937. *** 665,670 ****
  1938. --- 670,676 ----
  1939.       register char *str;
  1940.       register int b;
  1941.   
  1942. +     if (tag != NULL)
  1943.       *tag = var_on_stack(var) ? '>' :
  1944.       (var->var_flags & V_MODIFIED) ? '*' : ' ';
  1945.   
  1946. ***************
  1947. *** 752,757 ****
  1948. --- 758,770 ----
  1949.       return res;
  1950.   }
  1951.   
  1952. + static int vc_column;
  1953. + 
  1954. + var_compl_opts(col)
  1955. + int col;
  1956. + {
  1957. +     vc_column = col;
  1958. + }
  1959.   
  1960.   var_completion(path, index)
  1961.   char *path;
  1962. ***************
  1963. *** 760,767 ****
  1964.       static char *head, *tail = NULL;
  1965.       static int len;
  1966.       static struct variable_defs *var, *help_var;
  1967.   
  1968. !     if (index < 0) return 0;
  1969.   
  1970.       if (path) {
  1971.       head = path;
  1972. --- 773,784 ----
  1973.       static char *head, *tail = NULL;
  1974.       static int len;
  1975.       static struct variable_defs *var, *help_var;
  1976. +     extern int prompt_length, prompt_line;
  1977.   
  1978. !     if (index < 0) {
  1979. !     clrmsg(-(index + 1));
  1980. !     return 1;
  1981. !     }
  1982.   
  1983.       if (path) {
  1984.       head = path;
  1985. ***************
  1986. *** 807,815 ****
  1987. --- 824,835 ----
  1988.       if (index < 0) continue;
  1989.       if (index > 0) break;
  1990.       sprintf(tail, "%s ", var->var_name + len);
  1991. +     msg("%.70s", var_value(var, (char *)NULL));
  1992. +     gotoxy(prompt_length + vc_column, prompt_line);
  1993.       var++;
  1994.       return 1;
  1995.       }
  1996. +     clrmsg(vc_column);
  1997.       return 0;
  1998.   }
  1999.   
  2000. ***************
  2001. *** 977,984 ****
  2002.       return 0;
  2003.   }
  2004.   
  2005. ! disp_variables(all)
  2006.   int all;
  2007.   {
  2008.       char *str, pushed;
  2009.       int b;
  2010. --- 997,1005 ----
  2011.       return 0;
  2012.   }
  2013.   
  2014. ! disp_variables(all, rexp)
  2015.   int all;
  2016. + char *rexp;
  2017.   {
  2018.       char *str, pushed;
  2019.       int b;
  2020. ***************
  2021. *** 988,1002 ****
  2022.   
  2023.       if (in_init) return;
  2024.   
  2025. -     pg_init(0, 1);
  2026. - 
  2027.       clrdisp();
  2028. !     if (novice && !all) {
  2029.       msg("Use `:set all' to see all variable settings");
  2030.       home();
  2031.       }
  2032. !     pg_next();
  2033. !     so_printf("Variable settings:");
  2034.   
  2035.       for (var = variables; var < &variables[TABLE_SIZE]; var++) {
  2036.       if (pg_regexp != NULL && regexec(pg_regexp, var->var_name) == 0)
  2037. --- 1009,1026 ----
  2038.   
  2039.       if (in_init) return;
  2040.   
  2041.       clrdisp();
  2042. !     if (novice && !all && rexp == NULL) {
  2043.       msg("Use `:set all' to see all variable settings");
  2044.       home();
  2045.       }
  2046. ! 
  2047. !     so_printxy(0, 0, "Variable settings");
  2048. !     pg_init(1, 1);
  2049. !     if (rexp) {
  2050. !     pg_regexp = regcomp(rexp + 1);
  2051. !     all = 1;
  2052. !     }
  2053.   
  2054.       for (var = variables; var < &variables[TABLE_SIZE]; var++) {
  2055.       if (pg_regexp != NULL && regexec(pg_regexp, var->var_name) == 0)
  2056.